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-TITLE LBR_TRANSFER transfer vectors f j 
IDENT anita 000" vectors for Library access procedures 


MARBABAARAALALLSLALLALALLAAAS ARAL ERASERS RARER RR RASA RARER RRR AA RA RAR RRA R RADDA DSS 


COPYRIGHT (c) 1978, 1980, 1982, 1984 B 


pojejloleleoloio) 
Ooo 


1 
oo OOS 
00 4 ; 
44 > § 
$0 . is : 
0000 8 :* DIGITAL EQUIPMENT CORPORATION, MAYNARD. MASSACHUSETTS. ° L1B! 
000 9 :* ALL RIGHTS RESERVED. reacanncgoihi : | 1B! 
0000 «1. f* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE US : | tie 
: N Y USED AND COPIED ‘ 
4 1 z* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WIA tHe : L1B! 
0 15 ;* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * 
mm EPM SCCM Mar 
° . & ‘ 
8000 1g :* TRANSFERRED. a * | L 1B! 
® 
G388 18 ES TMG TMLGRMAION,IMSDMUSGEOERUAE ES SUBMRE TESS SECHEOUOUNBRERE HB 
Py ® ' 
0000 20: CORPORATION. dsguer Atmensch | C1B 
o * 
0000 ; 3* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIA TY OF IT LiB! 
0000 - :* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY Ohi te —_ cic ‘ | LIB 
0000 24 5 * | L1B! 
0000 $? 3* ® L1B! 
444 $8 PURAReRA Tee eee eee eee eee KKK KKK eee eee e eee Keeeeeeeeeeeerereterrereertereree rere LIB! 
0000 28 :++ | L1B' 
0000 9; FACILITY: LIB! 
$009 , i Lib d | tie 
: rary access t 
444 3 y access procedure se | at 
0000 33; ABSTRACT: | LIB! 
$3 te ti :; oe cre 
3 e library access proce t t th 
0000 36 ;: for eccees tne florer? oa. a SE ETON SRNEUNS Sas LIB 
0000 37 ; LIB 
0000 3 : ENVIRONMENT: LIB 
0000 9; LIB 
0900 40 ; Native mode, user mode L18 
0000 41 ; L1B 
0000 4 3 AUTHOR: LIB 
0000 43; 
tt rc : Tim Halvorsen, Benn Schreiber August 1979 Lie 
0000 46; MODIFIED BY: | LIB 
$0008 V03-003 JwT0124 01-Jun-1983 | at 
i444 $3 ; Add entry point vonsita H. a | Lie 
Py } 
0900 2) $ v03-002 qereses Jim Teague 03-Mar-1983 L18 
00 ¢ ; Change psect name. | Lie 
009 34 ; V03-001 JWwT0056 Jim Teague 22-Sep-1982 | LIB 
38 5 3 Add lor$dcx_map. 
0008 | 
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-PSECT $S$VECTOR_O_LBR, PIC, SHR, NOWRT, EXE 


-MACRO transfer 
ANSFER 


- TRANS 
MASK 


BRW 
.ENDM 
LBR_TRANSFER: 


transfer 
transfer 
transfer 
transfer 


transfer 
transfer 
transfer 
transfer 
transfer 
transfer 
transfer 
transfer 
transfer 
transfer 
transfer 
-BLKB 

transfer 
transfer 
transfer 
transfer 
transfer 
transfer 
transfer 
transfer 
transfer 
transfer 
transfer 


-BLKB 
- END 
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: Define macro to set up transfer vectors 


entry_point 
entry point 
entry_point 
entry_point+2 


LBRSINI_ CONTROL 
LBRSOPER 


LBRSCLOSE 
LBRSLOOKUP_KEY 
LBRSINSERT—KEY 


LBRSGET_RECORD 
LBRSPUT_RECORD 


——1 == S 


LBRSGET— 
LORSF IND 


LBRSDCX”" MAP 
LBRSFLUSH 


512-<.-LBR_TRANSFER> 


AX/VMS Macro V04-00 Page § 
LBR.SRCITRANSFER.MAR; 1 (2) 


zsEntry point mask 
3Go to main routine code 


} 
Initialize control 
7 library 

Close library 

Lookup key 

Insert key 

removed lbr$replace_mod 

Read text record 

Write module text record 

Terminate writing module text 
Delete key 

Delete data 

Search index for given RFA 

Return contents of an index 

Set current index 

Return / update module header 
Return Library header 

Position to read module 

removed Lbr$dump : 
Return help text from HELP Library 
Set date/time into module header 
Replace key in index and update mo 
Put a library update history recor 
Get Library update history records 
Prompting and Library searching he 
Set locate mode 

Set move mode 

Return the RMS status value 
Conjure up a DCX map 

Flush cache 


Pad to full page 
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L18 
L18 
LIB 
LIB 
L18 
LIB 
LIB 
LIB 
LIB 
LIB 
LIB 
L18 
LIB 
L18 
LIB 
LIB 
LIB 
LIB 
LIB 
LIB 
LIB 
LIB 
LIB 
LIB 
LIB 
LIB 
LIB 
L186 
L18 
L18 
L18 
L18 
L18 
L18 
L168 
L16 
LI 
L16 
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SymBol table . green 19 4 01:40: LBR.SRCITRANSFER.MAR; 1 . 3) 
vote eeereree 8 6X 1 
LBRS eererere x 1 
tBRSDECETE. DATA teeeeeee =X 1 
LBRSDELETE_KEY eeeeeree 8 x 1 
LBRSF IND geeeeeet x 1 
LBRSFLU geeerere x 1 
LBRSGET_HEADER eererter x 1 
LBRSGET_HEL eeenenee § YX 1 
LBRSGET“HISTORY eeeeeeee Xx 01 | 
LBRSGET_ INDE eeerrere =X 1 
LBRSGET_RECORD eeeeeee xX 01 
BRSINI CONTROL teeeeee § X Bt 
LBRSINSERT_ KEY seeeeree xX 01 | 
LBRSINSERTTIRE seeeeers = 9 | 
Totes EY eeeetere x 1 
BRSOPEN geereeee x 01 
tBRSOUTPUT HELP eeeeeere xX 01 
LBRSPUT EN geerrere x 01 
CBRSPUT~ HISTORY eeeeeeee =X 3 
LBRSPUT— D eeerenee x 1 
LBRSREPCACE_KEY teeeeeee x 01 
LBRSRET eeeenere =X 01 
LBRSSEA eeeereee x Q1 
LBRSSET_ INDEX eeeeeenre x Q1 
LBRSSET-LOCATE teeeeere xX 01 
LBRSSET_MODULE eereneee x 01 
LBRSSET E eeeerere x O11 
LBR_TRANSFER 00000000 R 01 


PSECT name Allocation PSECT No. Attributes 
ABS . 00000000 0.) OO ¢ O.) NOPIC USR CON ABS LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 
SSVECTOR_O_LBR 00000200 ¢« 512.) O01 ¢ 1.) PIC USR CON REL LCL SHR ' EXE RD NOWRT NOVEC BYTE 


fuceessececooseoesecoeesces 


Phase Page faults CPU Time Elapsed Time 
Initialization 33 00300 :08. 1) 00:00:00.44 
processing 131 88: 0:00.48 BOR: 6-28 
Syabol cable core 8 00:00:00:61  00:00:00:01 | 
3) 00:00:00:30  00:00:00:97 | 
Symbol table output 4 0:00.04 0:00:00.04 
Psect synopsis output 1 zs 8 0:00: a3 | 
Cross-reference output 9 :00. 0:00: 2-9 
Assembler run totals 29 0:00:01.5 0:00:05.29 
Tee working set Limit was 750 pages. 
779 bytes (6 pages) of virtual memory were used to buffer the intermediate c 


ce were 10 pages of symbol table space allocated to hold 28 non-local ae 8° Tocat symbols. 
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VAX=11 Macro Run Statistics 1:40: 


105 source ines were read in Pass 1, producing 15 object records in Pass 2. 
1 page of virtual memory was used to “define 1 macro. 


fdececw ener enseceecesee eeceoewos} 


! Macro _tibrary Statistics ' 


"$255$DUA28: CSYSLIBISTARLET.MLB;2 0 
0 GETS were required to define 0 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=L1S$: TRANSFER/OBJ=OBJ$: TRANSFER MSRC$: TRANSFER/UPDATE=(ENH$: TRANSFER) 
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Macro Library name Macros defined 
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